home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 7 / Amiga Format AFCD07 (Dec 1996, Issue 91).iso / serious / shareware / programming / muirexx2.1 / demos / muirexxbuild / test / dirutil.rexx < prev    next >
OS/2 REXX Batch file  |  1996-06-27  |  3KB  |  91 lines
  1. /* Application created by MUIBuild */
  2.  
  3. address DIRUTIL
  4.  
  5. Notify  = 0x8042c9cb
  6. List_Active  = 0x8042391c
  7. EveryTime  = 0x49893131
  8. Set  = 0x8042549a
  9. Background  = 0x8042545b
  10. Group_Columns  = 0x8042f416
  11.  
  12. window ID WDIR COMMAND """quit""" PORT DIRUTIL TITLE """Directory Utility"""
  13.  text
  14.  group HORIZ
  15.   group LABELS """Directory,Buffers,Volumes""" REGISTER
  16.    group
  17.     text ID TXT1
  18.     dirlist ID DIR1 PATH "RAM:"
  19.     string ID STR1
  20.    endgroup
  21.    group
  22.     list
  23.    endgroup
  24.    group
  25.     volumelist
  26.    endgroup
  27.   endgroup
  28.   group LABELS """Directory,Buffers,Volumes""" REGISTER
  29.    group
  30.     text ID TXT2
  31.     dirlist ID DIR2 PATH "RAM:"
  32.     string ID STR2
  33.    endgroup
  34.    group
  35.     list
  36.    endgroup
  37.    group
  38.     volumelist
  39.    endgroup
  40.   endgroup
  41.  endgroup
  42.  group HORIZ
  43.   button PRESS COMMAND """dirlist ID DIR1 PATH df0:""" PORT DIRUTIL LABEL "DF0"
  44.   button PRESS COMMAND """dirlist ID DIR1 PATH ram:""" PORT DIRUTIL LABEL "RAM"
  45.   button PRESS COMMAND """dirlist ID DIR1 PATH system:""" PORT DIRUTIL LABEL "SYS"
  46.   button PRESS COMMAND """dirlist ID DIR1 PATH programs:""" PORT DIRUTIL LABEL "PRG"
  47.   button PRESS COMMAND """dirlist ID DIR1 PATH archives:""" PORT DIRUTIL LABEL "ARC"
  48.   button PRESS COMMAND """dirlist ID DIR1 PATH apps:""" PORT DIRUTIL LABEL "APP"
  49.   button PRESS COMMAND """dirlist ID DIR1 PATH tools:""" PORT DIRUTIL LABEL "TLS"
  50.   button PRESS COMMAND """dirlist ID DIR1 PATH data:""" PORT DIRUTIL LABEL "DAT"
  51.   button PRESS COMMAND """dirlist ID DIR2 PATH df0:""" PORT DIRUTIL LABEL "DF0"
  52.   button PRESS COMMAND """dirlist ID DIR2 PATH ram:""" PORT DIRUTIL LABEL "RAM"
  53.   button PRESS COMMAND """dirlist ID DIR2 PATH system:""" PORT DIRUTIL LABEL "SYS"
  54.   button PRESS COMMAND """dirlist ID DIR2 PATH programs:""" PORT DIRUTIL LABEL "PRG"
  55.   button PRESS COMMAND """dirlist ID DIR2 PATH archives:""" PORT DIRUTIL LABEL "ARC"
  56.   button PRESS COMMAND """dirlist ID DIR2 PATH apps:""" PORT DIRUTIL LABEL "APP"
  57.   button PRESS COMMAND """dirlist ID DIR2 PATH tools:""" PORT DIRUTIL LABEL "TLS"
  58.   button PRESS COMMAND """dirlist ID DIR2 PATH data:""" PORT DIRUTIL LABEL "DAT"
  59.  endgroup
  60.  group ATTRS Group_Columns 8
  61.   button
  62.   button
  63.   button
  64.   button
  65.   button
  66.   button
  67.   button
  68.   button
  69.   button
  70.   button
  71.   button
  72.   button
  73.   button
  74.   button
  75.   button
  76.   button
  77.   button
  78.   button
  79.   button
  80.   button
  81.   button
  82.   button
  83.   button
  84.   button
  85.  endgroup
  86. endwindow
  87. method ID DIR1 Notify List_Active EveryTime @TXT1 3 Set Background 131
  88. method ID DIR1 Notify List_Active EveryTime @TXT2 3 Set Background 4
  89. method ID DIR2 Notify List_Active EveryTime @TXT2 3 Set Background 131
  90. method ID DIR2 Notify List_Active EveryTime @TXT1 3 Set Background 4
  91.